home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / prog_c / cuj0696.zip / DWYER.ZIP / SPECTRAL.TST / TSTPUTXF.CX < prev    next >
Text File  |  1996-03-09  |  684b  |  28 lines
  1. #include <putxfrac.cx>
  2. main()
  3. {
  4.     USHORT    XNext[NE];
  5.  
  6.     ASCTOX(".0456", XNext);
  7.     printf("....v....1....v....2....v....3\n");
  8.     PutXFrac(XNext, 0, 15);
  9.     printf(".\n");
  10.     ASCTOX(".0456", XNext);
  11.     printf("....v....1....v....2....v....3\n");
  12.     PutXFrac(XNext, 2, 15);
  13.     printf(".\n");
  14.     ASCTOX("4567890.123", XNext);
  15.     printf("....v....1....v....2....v....3\n");
  16.     PutXFrac(XNext, 0, 15);
  17.     printf(".\n");
  18.     ASCTOX("4.56", XNext);
  19.     printf("....v....1....v....2....v....3\n");
  20.     PutXFrac(XNext, 0, 0);
  21.     printf(".\n");
  22.     ASCTOX("4.56e10", XNext);
  23.     printf("....v....1....v....2....v....3....v....4....v....5....v....6\n");
  24.     PutXFrac(XNext, 5, 0);
  25.     printf(".\n\n");
  26.     return 0;
  27. }
  28.